Top 10k strings from MicroHobby Semanal - Issue 013-016 (1985)(Hobby Press)(es)(Side B).tzx
in <root> / bin / z80 / software / Sinclair Spectrum Collection TOSEC.exe / Sinclair ZX Spectrum - Magazines / Sinclair ZX Spectrum - Magazines - [TZX] (TOSEC-v2007-01-01) /
Back to the directory listing
11 ;"PARE LA CINTA": 4 VALORES DE M1 3 a(pv,ph)=1 3 ;" POR FAVOR, 3 "coordenadas (x,y)";f;" , ";g 2 yp3,xp3;" " 2 yp2,xp2;" " 2 yp1,xp1;" " 2 formas no personales 2 a(pv,ph)=0 2 SUBJUNTIVO 2 F(V),P(V);" 2 ;"Seleccione su numero" 2 ;"PUNTOS:";PUNTOS 2 ;"PULSE UNA TECLA": 2 ;"MOMENTOS ELECTRICOS" 2 ;"*******************" 2 ;" ": 2 (NPROG/DOS) 2 "radio ";r 2 "ia","ias","ia","iamos","iais","ian" 2 "i","iste","io","imos","isteis","ieron" 2 "densidad ";d 2 "PRET. PLUSCUAMPERFECTO" 2 "PRET. PERFECTO" 2 "PRET. IMPERFECTO" 2 "PRESENTE" 2 "FUTURO PERFECTO" 2 "El grado debe ser >0" : 2 "22",CERO;B$: 2 1 xxxxxxxxxxxxxxxxzzzzzzzzzzzzzzzzxxxxxxxxxxxxxxxxzzzzzzzzzzzzzzzzxxxxxxxxxxxxxxxxzzzzzzzzzzzzzzzzxxxxxxxxxxxxxxxxzzzzzzzzzzzzzzzzxxxxxxxxxxxxxxxxzzzzzzzzzzzzzzzzxxxxxxxxxxxxxzzzzzzzzzzzzzzzzzzzxxxxxxxxxxxxxxxxzzzzzzzzzzzzzzzzxxxxxxxxxxxxxxzxzzzzzzzzzzzzzzzzxxxxxxxxxxxxxzzxzzzzzzzzzzzzzzzzxxxxxxxxxzzzzzzxzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzxzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzxzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzxzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzxxzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzxxxzzzzzzzzzzzzzzzzzzzzzzzzzzzzzxzzzzzzzzzzzzzzzz 8888888888888888888888888888888888888888888888888888888888888888 1 tot=tot+cdtp 1 ti;x2-x1,y2-y1,-t 1 t;x-ax,y-ay 1 t$="iendo": 1 t$="hubiese": 1 t$="hubiere" 1 t$="ando": 1 subjuntivo 1 repeticion o salida 1 r$="hubiera" 1 q$="?????" 1 kw=vat/1000 1 km=mt/1000 1 i$="iese": 1 formas personales (indicativo) 1 formas indicativas perfectas 1 f*x,n*y+(135 1 e$="1234567890": 1 desea otra opcion? 1 desea otra opcion 1 count=count+a(n): 1 count=count+1 1 cdt POR TRAMOS 1 cargador f 1 carga tabla caracteres 1 cabecera subjuntivo 1 c(n)=c(n)/100 1 c(n)=c(n)+.5 1 c(n)=c(n)*100 1 a(ind)=a(ind)+p(ind) 1 a$="111111111111110111111111111111": 1 Z(I);" "; 1 Z$=Z$+"----Q- PARA SUBIR----A-PARA BAJAR----L-PARA DISPARAR.PULSA SIMULTANEAMENTE CAPS SHIFT PARA MOVER MAS DEPRISA************ESPERA UNOS SEGUNDOS Y PULSA UNA TECLA PARA JUGAR***** " 1 Z$="***LAS TORRES********POR ALEJANDRO LABARGA Y JORGE LIZAR*******TU MISION ES DESTRUIR LOS TANQUES ENEMIGOS QUE SE ESCONDEN EN LAS GRIETAS DE LAS TORRES********TUS CONTROLES SON:" 1 Y2=Q-Q(V): 1 Y1=P-P(V): 1 X3=X1*P-X2*Q: 1 X2=X1*Q+X2*P: 1 Verbos 1 UNO;"PONGA EN MARCHA LA CINTA"; 1 Torres 1 TZX por Manuel Gomez Amate 1 TRAMOS A PROCESAR 1 TENSION DE SERVICIO 1 SUBRUTINA IMPRESION 1 SUBR IMPRESION TRAMOS 1 SPACE-UNO,X1 1 SPACE-UNO,CERO: 1 SPACE,LINEA: 1 SPACE,CERO: 1 SOLO DOS DECIMALES 1 SI EL POLO ES COMPLEJO ANADE EL CONJUGADO EN U+1 1 RUTINA PRINCIPAL 1 RUTINA EXPLOSION 1 R2=(N2*D1-N1*D2)/D : 1 R1=(N1*D1+N2*D2)/D: 1 Q2=-Q1*P-2 1 Polinomios 1 PUNTOS=PUNTOS+FUEL*10 1 PUNTOS=PUNTOS+10 1 PROCESADO DE (t) TRAMOS 1 PRESENTACION 1 POTENCIA,EN vatios 1 PASO DE PANTALLA 1 PANT=PANT+1 1 P(U),Q(U) : 1 OPCION FINAL 1 NAVES=NAVES-1 1 N2=N2+X2*Z(V) 1 N1=N1+X1*Z(V): 1 N$=" " 1 Momentos 1 MOVIMIENTO HELICOPTERO 1 MOVIMIENTO 1 MICRO 1 Laber3d ( 1 LONGITUD EN mts 1 LLAMADA SUBRUTINAS 1 LAST=23560 1 L$=" HAS CONSEGUIDO ELIMINAR LOS INVASORES DE LAS DOCE TORRES. EL ALTO MANDO,AGRADECIDO,TE CON-CEDE UNAS LARGAS VACACIONES" 1 K$="HAS CONSEGUIDO LA MEJOR PUNTUA- CION.GRABA TU NOMBRE PULSANDO LAS TECLAS CORRESPONDIENTES (MAXIMO 12 LETRAS)PULSA 0 PARA CONTINUAR" 1 INICIAR JUEGO 1 IMPRESION VARIABLES 1 IMPRESION TRAMOS Y cdt 1 I,CERO;,,: 1 Hobby Press 1 Geometra 1 FUEL=FUEL-1 1 FINALIZACION 1 F(V),P(V);"*": 1 F(V),P(V);" ": 1 ENTRADA DEL NUMERADOR 1 ENTRADA DEL DENOMINADOR EN FORMA DE POLOS COMPLEJOS 1 E$="---------------------------------" 1 Dados : 1 DOS=UNO+UNO 1 DIMENSIONADO DE TABLAS 1 DESTRUCCION TANQUE 1 DESIGNACION DE TRAMOS 1 DEFINICION PANTALLAS 1 DEFINICION DE CARACTERES 1 D=D1*D1+D2*D2 1 D3=D1*Y1-D2*Y2: 1 D2=D1*Y2+D2*Y1: 1 Chrom u 1 Castellano 1 Campos a 1 CONDUCTOR EN EL TRAMO 1 COBRE DESCUBIERTO 1 COBRE AISLADO 1 CINTA 04 CARA B 1 CERO;" "; 1 CEACCION GRAFICOS 1 CARACTERISTICAS CONDUCT 1 CARAB L 1 CALCULO cdt 1 C$=" Por favor, elija un programa " 1 Boyerland 1 BYTE=YT+(K2-K1+1 1 BYTE=BYTE+1 1 BYTE=(K1-32 1 B$=B$+"1": 1 B$=B$+"0": 1 B$=" " 1 Ahorcado 1 ALUMINIO DESCUBIERTO 1 ALUMINIO AISLADO 1 ="L")-(378 1 ;tens;" V"; 1 ;q$;": ";h 1 ;kw;" Kw"; 1 ;a$;t$;y$: 1 ;a$+i$+y$;" 1 ;a$+i$+y$: 1 ;a$(n);":______________ 0" 1 ;'''" TRAMO A CALCULAR * (";a$(n);") * " 1 ;'"Tension ............. "; 1 ;' "SIMPLES:" 1 ;' "COMPUESTAS:" 1 ;"haya";y$; 1 ;"elige tiempo (del 0 al 9) ";s: 1 ;"elige tiempo (del 0 al 5) ";f: 1 ;"elige modo (del 0 al 3) ";m: 1 ;"____________________" 1 ;"UTILICE"''; 1 ;"Teclea el verbo en infinitivo. ": 1 ;"TRAMO";a$(n) 1 ;"TRAMO";a$(f); 1 ;"TOTAL:"; 1 ;"Seleccione un numero" 1 ;"SWITZERLAND" 1 ;"SUBJUNTIVO": 1 ;"SU PALABRA ES DEMASIADO LARGA"'" EL MAXIMO SON 10 LETRAS ": 1 ;"SELECCIONE:"''''" 1 ;"SELECCIONE SECCION:"'''' 1 ;"SELECCIONE LA TENSION" 1 ;"RESULTADOS"' 1 ;"RECORD ";q$ 1 ;"Pulse una tecla": 1 ;"Potencia ............ "; 1 ;"Por Francisco Lorca.": 1 ;"Pero no crea que va a ser fa-cil: tendra que esquivar las minas explosivas que protegen la frontera y a los feroces 'Boyermen', malvados inspecto- res de hacienda que caeran so- bre Ud. con todo el peso de la Ley." 1 ;"PUNTOS:";PUNTOS 1 ;"PUNTOS"; 1 ;"PULSE CUALQUIER TECLA." 1 ;"PULSE CUALQUIER TECLA 1 ;"PULSA UNA TECLA PARA CONTINUAR" 1 ;"PROGRAMA" 1 ;"PRESION FISCAL: 0%" 1 ;"PRESENTE:" 1 ;"PARA VOLVER A EMPEZAR"; 1 ;"Otra? (s/n)" 1 ;"No puedes atravesar paredes !!": 1 ;"NO DEJE ESPACIOS VACIOS": 1 ;"NAVES:";NAVES; 1 ;"Mueve con:1(arriba)y 2(abajo), pero recuerda que te mueves pa- ra la derecha al mismo tiempo y si te sales por un lado de la pantalla llegas al otro." 1 ;"MODO INDICATIVO": 1 ;"M1 .................. "; 1 ;"Longitud ............ "; 1 ;"Letras erroneas{"; 1 ;"LA PALABRA ERA: "; 1 ;"Jugadas:0" 1 ;"IMPERATIVO" 1 ;"G A M E O V E R": 1 ;"Fracciones parciales" : 1 ;"FUEL:";FUEL 1 ;"FORMAS NO PERSONALES" 1 ;"FIN DE LA PARTIDA"; 1 ;"FALLOS=";n 1 ;"ESCRIBA LA PALABRA A ADIVINAR"''" Y DESPUES PULSE "; 1 ;"ESCRIBA LA LETRA Y PULSE "; 1 ;"ENTRE LAS LETRAS DE 1 EN 1": 1 ;"EL MEJOR:" 1 ;"EL AHORCADO"; 1 ;"Defiende el tubo con tu nave construyendo campos de energia al final de los cuatro finales abiertos del sistema.Si intentasponer los campos en otro sitio que no sean los finales resul- taras destruido" 1 ;"DISPONDRA DE 6 FALLOS PARA DESCU"''"BRIR LA PALABRA OCULTA": 1 ;"DESEA OTRO VERBO (s/n)?";Q$ 1 ;"DESEA OTRO TIEMPO (s/n)?";Q$ 1 ;"Conductor ........... "; 1 ;"CUANTOS TRAMOS A CALCULAR?" 1 ;"CAMPOS DE ENERGIA": 1 ;"Boyerland es un pais donde noconviene guardar dinero, y no esque se lo vayan a robar, sino que los impuestos suben y suben continuamente y como se descuidese queda Ud. sin un centavo." 1 ;"BOYERLAND"; 1 ;"BOYERLAND" 1 ;"Asi que lo mejor que puede hacer es llevarse el dinero a Switzerland, antes de que la presion fiscal llegue al 1000%" 1 ;"APRIETE UNA TECLA PARA CONTINUAR": 1 ;"? DESEA SEGUIR JUGANDO (S/N)?" 1 ;"12345678": 1 ;"----------" 1 ;"-- CONDUCTOR DE COBRE AISLADO --" 1 ;"- CONDUCTOR DE ALUMINIO AISLADO " 1 ;"**PULSA UNA TECLA PARA JUGAR**" 1 ;"** PULSE UNA TECLA PARA OTRA ***": 1 ;"% CDT TOTAL= ";tot;" VOLTS" 1 ;"% CDT ";cdtp;" volt" 1 ;" TIEMPO : "; 1 ;" Pulsa una tecla para empezar ": 1 ;" PALABRAS DE MAXIMO 10 LETRAS"; 1 ;" LABERINTO " 1 ;" CONDUCTOR DE COBRE DESCUBIERTO" 1 ;" CONDUCTOR ALUMINIO DESCUBIERTO " 1 ;" Si no quieres ver el plano, "'" pulsa la N " 1 ;" QUIERE REPETIR CALCULO (S/N) " 1 ;" LLEGASTE ": 1 ;" SU PALABRA NO TIENE LETRAS ": 1 ;" !!!TE HAS AHORCADO!!! " 1 ;" SOLO VERBOS REGULARES " 1 ;" !!EXTRAORDINARIO!! "'" LO HAS LOGRADO SIN FALLOS" : 1 ;" !!!MUY BIEN!!! "'" LO HAS LOGRADO CON ";n;" FALLOS": 1 ;" !!!ESTUPENDO!!! "'" LO HAS LOGRADO CON 1 FALLO": 1 ;" NORMALILLO "'" LO HAS LOGRADO CON ";n;" FALLOS": 1 ;" ": 1 28 1 -(q-p),q/2 1 -(p-q),(q-128 1 ,D.L.: M-36598-84 1 ,"MICROHOBBY",64 1 ,"J.PAMOS",20 1 +n;b$;" }" 1 *SALIDA POLO REAL : 1 *SALIDA PAR COMPLEJO * 1 *NUMERADOR* 1 *DENOMINADOR* 1 *COCIENTE* 1 *********************** 1 ********************** 1 *** CINTA-MICROHOBBY *** 1 *(a(n,m));" ": 1 * AVISO POLO MULTIPLE * 1 );" RESIDUO R=";N1/D1 1 )+M$(P(V)-19 1 (VALOR)<"A" 1 (R1*R1+R2*R2) 1 '';" ";a$;b$;" 1 '''"SELECCIONE SECCION:"''' 1 '''"SELECCIONE CONDUCTOR"''' 1 ''"SELECCIONE SECCION:"''' 1 ''"% CDT acumulada (";tot;" volt)" 1 '"presente....................0 pret. imperfecto............1 preterito perfecto..........2 pret. pluscuamperfecto......3 futuro......................4 futuro perfecto.............5": 1 '"formas no personales.........0 modo indicativo..............1 modo subjuntivo..............2 modo imperativo..............3" 1 ' "PARTICIPIO";" ";A$;h$ 1 ' "INFINITIVO";" ";x$ 1 ' "INFINITIVO";" ";"haber ";a$;h$ 1 ' "GERUNDIO";" ";"habiendo ";a$;h$ 1 ' "GERUNDIO";" ";A$;t$ 1 "solitarios? "; 1 "radio ";r: 1 "radio ";r 1 "quieres grabar los caracteres encinta? ";c$: 1 "presente.....................0 pret. imperfecto.............1 pret. indefinido.............2 futuro imperfecto............3 pret. perfecto...............4 pret. pluscuamperfecto.......5 pret. anterior...............6 futuro perfecto..............7 condicional simple...........8 condicional compuesto........9": 1 "polos(dar solo un miembro de" : 1 "poligono de hilos? (s/n)";o$: 1 "paso a impresora s/n ";i$: 1 "otra vez? "; 1 "o","es","e","imos","is","en" 1 "o","es","e","emos","eis","en" 1 "o","as","a","amos","ais","an" 1 "nomio denominador,de menor a" : 1 "no. lados ";n: 1 "n. lados ";n: 1 "mayor exponente" 1 "iria","irias","iria","iriamos","iriais","irian" 1 "ire","iras","ira","iremos","ireis","iran" 1 "hube","hubiste","hubo","hubimos","hubisteis","hubieron" 1 "he","has","ha","hemos","habeis","han" 1 "habria","habrias","habria","habriamos","habriais","habrian" 1 "habre","habras","habra","habremos","habreis","habran" 1 "habia","habias","habia","habiamos","habiais","habian" 1 "h",aa,aa,aa,aa, 1 "figura giratoria? (s/n)";o$: 1 "figura de semicirculos? (s/n)";o$: 1 "figura de circulos s/n";o$: 1 "eria","erias","eria","eriamos","eriais","erian" 1 "ere","eras","era","eremos","ereis","eran" 1 "elige una opcion, pulsa s ";o$: 1 "e","aste","o","amos","asteis","aron" 1 "distancia al centro ";d 1 "densidad ";i 1 "cual eliges? "; 1 "cu 6 -aisl" 1 "cu 4 -aisl" 1 "coordenadas (x-y) ";f;" , ";g 1 "color tinta (0-7)";ti: 1 "color tinta (0-7)";t: 1 "color fondo ";c: 1 "color de la tinta 0-7";t: 1 "color de la tinta (0-7)";t: 1 "cada par complejo:" 1 "borro? (s/n)";o$: 1 "aria","arias","aria","ariamos","ariais","arian" 1 "are","aras","ara","aremos","areis","aran" 1 "angulo entre puntos (0- 1 "angulo del trazado (0- 1 "aba","abas","aba","abamos","abais","aban" 1 "VERBOS",-10 1 "TRANSF. A*EXP(-J*";" 1 "Si pones un campo de energia sinenemigo dentro,seras destruido": 1 "SUMANDO Q1*S+Q2:" : 1 "RESIDUO R*EXP(-J* 1 "RECORD:INTRODUCE TU NOMBRE (4 Letras maximo)", 1 "Quieres introducir mas carac- teres? ";c$: 1 "Quieres hacer otra descomposicion (si/no)";T$ 1 "Potencia en vatios ";vat: 1 "Parte REAL e IMAGINARIA de los" : 1 "PRET. INDEFINIDO" 1 "PRET. ANTERIOR" 1 "POLO REAL -A=";P; 1 "POLO MULTIPLE. (";P(U);",";Q(U);")": 1 "PAR COMPLEJO -A";" 1 "Orden del NUMERADOR y del DENO- MINADOR ";G,K 1 "O para ir a derecha de 1 en 1": 1 "Numero de codigo del primer ca- racter a cambiar? ";k1'"Num. codigo del ultimo? ";k2: 1 "Nombre? ";n$: 1 "NOTA: Cualquier parecido de esteprograma con personas, paises o situaciones reales es pura coin-cidencia, que conste." 1 "NO SE DESCOMPONERLO,LO SIENTO": 1 "MicroHobby Semanal numeros 13 a 16 1 "Longitud en mts ";mt: 1 "La letra";b$: 1 "L para ir a derecha de 2 en 2" 1 "K para ir a izquierda de 2 en 2": 1 "Instale un campo de energia en la boca de un tubo con (0). Si dejas pasar un enemigo o te autodestruyes pierdes energia, si la perdida es muy grande el juego termina."; 1 "I para ir a izquierda de 1 en 1": 1 "FUTURO IMPERFECTO" 1 "Espere un momento,por favor" 1 "El grado debe ser <20" : 1 "ESTE ES EL NUEVO JUEGO DE CARAC-TERES:": 1 "EL PROGRAMA NO SIRVE PARA ELLOS.EL RESTO DE LOS RESULTADOS SON CORRECTOS" 1 "E-Dados","F-Laber3d","G-Momentos","H-Ahorcado","I-Polinomios","J-Boyerland","K-Verbos" 1 "Dame los coeficientes del poli-" : 1 "CONDICIONAL SIMPLE" 1 "CONDICIONAL COMPUESTO" 1 "Atencion,para cargar los carac- teres,y utilizarlos en vuestros programas poner:"'"CLEAR 31823"'"POKE 23606,80:POKE 23607,123"'"LOAD """" 1 "A-Campos","B-Chrom","C-Torres","D-Geometra" 1 ";r$;y$;" ";p$ 1 ";a$+o$+y$: 1 ";''" ";a$;c$;" 1 ";"j*B =";P;" 1 ";"=";F*180 1 "64"+NPROG) 1 "5";"cara: "; 1 "5";"Programa: "; 1 "5";"Programa inexistente": 1 "5";"'R' Vuelve al menu" 1 "5";"'L' Carga el programa"; 1 "32"-I;C$( 1 "22",CERO;C$(I 1 "22",CERO;B$ 1 "22",CERO; 1 ","K","Q","J","r","n" 1 "(";P(U);",";Q(U);")" 1 "","s","","mos","is","n" 1 " CAPS SHIFT para ir mas deprisa" 1 " R=";R," 1 " Q1=";Q1,"Q2=";Q2 1 " POLO ";U;" (X,Y)=";: 1 " 1 programa creado por... ******** *P.G.C.* ******** 1 a$(f) - TRAMO c(f) - cdt en V% 1 Renovacion plano 1 Movimiento 1 Manuel Freire 1 MOMENTOS ELECTRICOS LUIS AMADO REGO y MICROHOBBY 1 Inicializacion 1 Gustavo Reimers 1985 1 G. Reimers 1985" 1 Direccion 1 Carlos Quintero 1 Caracteres graficos 1 - RZ 150 mm2" 1 - RZ 95 mm2"'' 1 - RZ 50 mm2"'' 1 - RZ 25 mm2"'' 1 - LC 56"'' 1 - LC 28"'' 1 - CONDUCTOR COBRE DESCUBIERTO"''" 1 - CONDUCTOR COBRE AISLADO"''" 1 - CONDUCTOR ALUMINIO AISLADO"''" 1 - CONDUCTOR ALUM. DESCUBIERTO" 1 - 35 mm2" 1 - 220 V"''" 1 - 10 mm2"'' 1 - 7 mm2"'' 1 - 3 mm2"'' 1 ONES PARCIALES 1 DESAROLLO EN FRACCI 1 Pulsa una tecla 1 Laberinto 1 RESULTADOS 1 AUTOR......JUAN PAMOS NAVAS PROGRAMA...VERBO ORDENADOR..ZX-SPECTRUM MODELO.....16 & 48K FECHA......OCTUBRE 1984 1 1